home *** CD-ROM | disk | FTP | other *** search
- object WizardPrint: TWizardPrint
- Left = 22
- Top = 115
- BorderStyle = bsDialog
- Caption = 'Print Wizard'
- ClientHeight = 303
- ClientWidth = 518
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- PixelsPerInch = 120
- Scaled = False
- OnCreate = FormCreate
- OnShow = FormShow
- TextHeight = 16
- object Bevel1: TBevel
- Left = 8
- Top = 248
- Width = 497
- Height = 9
- Shape = bsTopLine
- end
- object Panel1: TPanel
- Left = 16
- Top = 16
- Width = 161
- Height = 217
- BevelOuter = bvLowered
- Caption = 'Panel1'
- Color = clTeal
- TabOrder = 0
- object Image1: TImage
- Left = 8
- Top = 8
- Width = 130
- Height = 200
- AutoSize = True
- Center = True
- Picture.Data = {<image000.bmp>}
- end
- end
- object BackBtn: TButton
- Left = 197
- Top = 260
- Width = 97
- Height = 30
- Cancel = True
- Caption = '< Back'
- Enabled = False
- TabOrder = 1
- OnClick = BackBtnClick
- end
- object NextBtn: TButton
- Left = 293
- Top = 260
- Width = 97
- Height = 30
- Cancel = True
- Caption = 'Next >'
- Default = True
- TabOrder = 2
- OnClick = NextBtnClick
- end
- object Button1: TButton
- Left = 408
- Top = 260
- Width = 97
- Height = 30
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 3
- end
- object Sheets: TNotebook
- Left = 184
- Top = 16
- Width = 321
- Height = 217
- PageIndex = 1
- TabOrder = 4
- OnPageChanged = SheetsPageChanged
- object TPage
- Left = 0
- Top = 0
- Caption = 'Error'
- object Label7: TLabel
- Left = 8
- Top = 33
- Width = 305
- Height = 59
- AutoSize = False
- Caption =
- 'Smart Address uses Page Layouts for printing. These hold all det' +
- 'ails regarding the Fields, and their layout, to be printed.'
- WordWrap = True
- end
- object Label13: TLabel
- Left = 8
- Top = 94
- Width = 299
- Height = 72
- AutoSize = False
- Caption =
- 'There currently are no Page Layouts defined to Smart Address. Be' +
- 'fore any printing may take place, it will be necessary to create' +
- ' at least one Page Layout.'
- WordWrap = True
- end
- object Label14: TLabel
- Left = 8
- Top = 8
- Width = 297
- Height = 25
- AutoSize = False
- Caption = 'Error Extracting Page Layout Definitions'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label15: TLabel
- Left = 8
- Top = 168
- Width = 297
- Height = 45
- AutoSize = False
- Caption =
- 'If required the Page Layout Designer may be invoked by use of th' +
- 'e Layout Button.'
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '0'
- object Label11: TLabel
- Left = 8
- Top = 8
- Width = 305
- Height = 41
- AutoSize = False
- Caption =
- 'This Wizard will guide you through the process of printing Entri' +
- 'es from Smart Address.'
- WordWrap = True
- end
- object Bevel5: TBevel
- Left = 8
- Top = 49
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object Bevel9: TBevel
- Left = 8
- Top = 175
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object Label12: TLabel
- Left = 8
- Top = 184
- Width = 305
- Height = 25
- AutoSize = False
- Caption = 'To begin the Print Process, click Next'
- WordWrap = True
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '1'
- object Bevel3: TBevel
- Left = 8
- Top = 49
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object Label2: TLabel
- Left = 8
- Top = 10
- Width = 305
- Height = 39
- AutoSize = False
- Caption = 'Please select the type of Address Book print you Require:'
- WordWrap = True
- end
- object Type1: TRadioButton
- Left = 16
- Top = 64
- Width = 273
- Height = 17
- Caption = '&Address Book Entries'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object Type2: TRadioButton
- Left = 16
- Top = 88
- Width = 273
- Height = 17
- Caption = 'Address Book &Reminders'
- TabOrder = 1
- end
- object Type3: TRadioButton
- Left = 16
- Top = 112
- Width = 273
- Height = 17
- Caption = 'Address Book &Telephone Logs'
- TabOrder = 2
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '2'
- object Label10: TLabel
- Left = 8
- Top = 8
- Width = 293
- Height = 32
- Caption =
- 'Please select the range of entries that you wish to be included ' +
- 'within the Print:'
- WordWrap = True
- end
- object Bevel4: TBevel
- Left = 8
- Top = 49
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object Bevel7: TBevel
- Left = 8
- Top = 161
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object Scope4: TRadioButton
- Left = 16
- Top = 130
- Width = 305
- Height = 17
- Caption = 'All &Entries in the Address Book'
- Checked = True
- TabOrder = 3
- TabStop = True
- end
- object Scope3: TRadioButton
- Left = 16
- Top = 106
- Width = 305
- Height = 17
- Caption = 'All Tagged Entries in the Address &Book'
- TabOrder = 2
- end
- object Scope2: TRadioButton
- Left = 16
- Top = 81
- Width = 305
- Height = 17
- Caption = 'All Entries &Displayed in the Index List'
- TabOrder = 1
- end
- object Scope1: TRadioButton
- Left = 16
- Top = 57
- Width = 265
- Height = 17
- Caption = '&Selected Entry Only'
- TabOrder = 0
- end
- object PrintFirst: TCheckBox
- Left = 16
- Top = 169
- Width = 281
- Height = 17
- Caption = 'Print the First Address Template Only'
- State = cbChecked
- TabOrder = 4
- Visible = False
- OnClick = PrintFirstClick
- end
- object PrintAll: TCheckBox
- Left = 16
- Top = 191
- Width = 281
- Height = 17
- Caption = 'Print All Address Templates'
- TabOrder = 5
- Visible = False
- OnClick = PrintAllClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'Sort'
- object Label18: TLabel
- Left = 8
- Top = 8
- Width = 305
- Height = 59
- AutoSize = False
- Caption =
- 'By default, Smart Address prints in the same order as entries ar' +
- 'e displayed in the Index List. However, if required this may be' +
- ' overridden.'
- WordWrap = True
- end
- object Bevel12: TBevel
- Left = 8
- Top = 71
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object DefaultOrder: TRadioButton
- Left = 16
- Top = 83
- Width = 265
- Height = 17
- Caption = 'Use Default Print Order'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object SpecifyOrder: TRadioButton
- Left = 16
- Top = 109
- Width = 305
- Height = 17
- Caption = 'Use Specified Field to Sort Print'
- TabOrder = 1
- OnClick = SpecifyOrderClick
- end
- object SortField: TComboBox
- Left = 32
- Top = 134
- Width = 273
- Height = 24
- Style = csDropDownList
- Enabled = False
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 2
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '3'
- object Bevel8: TBevel
- Left = 8
- Top = 49
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object Label17: TLabel
- Left = 80
- Top = 124
- Width = 75
- Height = 18
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'and t&he'
- FocusControl = EDateBox
- end
- object Label16: TLabel
- Left = 8
- Top = 6
- Width = 305
- Height = 21
- AutoSize = False
- Caption = 'Please select the range of dates to be printed:'
- WordWrap = True
- end
- object RangeAll: TRadioButton
- Left = 16
- Top = 64
- Width = 249
- Height = 17
- Caption = 'All Date E&ntries'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = RangeDatesClick
- end
- object RangeDates: TRadioButton
- Left = 16
- Top = 91
- Width = 144
- Height = 17
- Caption = 'E&vents Between'
- TabOrder = 1
- OnClick = RangeDatesClick
- end
- object DateBox: TComboBox
- Left = 169
- Top = 87
- Width = 117
- Height = 24
- DropDownCount = 0
- Enabled = False
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 2
- Text = 'DateBox'
- OnDropDown = DateBoxDropDown
- end
- object EDateBox: TComboBox
- Left = 169
- Top = 121
- Width = 117
- Height = 24
- DropDownCount = 0
- Enabled = False
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 3
- Text = 'EDateBox'
- OnDropDown = DateBoxDropDown
- end
- object IncludeAll: TCheckBox
- Left = 16
- Top = 165
- Width = 297
- Height = 17
- Caption = '&Include Completed Events or Reminders'
- TabOrder = 4
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '4'
- object Label4: TLabel
- Left = 8
- Top = 8
- Width = 305
- Height = 64
- AutoSize = False
- Caption =
- 'Smart Address uses Page Layouts for printing. These hold all det' +
- 'ails regarding the Fields, and their layout, to be printed.'
- WordWrap = True
- end
- object Label6: TLabel
- Left = 9
- Top = 140
- Width = 296
- Height = 21
- AutoSize = False
- Caption = 'Please select the Page Layout to be &used:'
- FocusControl = TUsed
- WordWrap = True
- end
- object Label8: TLabel
- Left = 8
- Top = 72
- Width = 305
- Height = 48
- AutoSize = False
- Caption =
- 'Layout may be Edited or Created by using the Page Layout Designe' +
- 'r facility within Smart Address.'
- WordWrap = True
- end
- object TUsed: TComboBox
- Left = 9
- Top = 164
- Width = 297
- Height = 24
- Style = csDropDownList
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- Sorted = True
- TabOrder = 0
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '5'
- object Label1: TLabel
- Left = 8
- Top = 8
- Width = 305
- Height = 41
- AutoSize = False
- Caption = 'Please specify the Number of Copies you require to be printed'
- WordWrap = True
- end
- object Bevel2: TBevel
- Left = 8
- Top = 49
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object CopiesLabel: TLabel
- Left = 52
- Top = 136
- Width = 137
- Height = 18
- AutoSize = False
- Caption = 'Number of &Copies'
- FocusControl = Copies
- end
- object LabelBev: TBevel
- Left = 8
- Top = 169
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object Copies: TSpinEdit
- Left = 196
- Top = 132
- Width = 57
- Height = 26
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MaxValue = 999
- MinValue = 1
- ParentFont = False
- TabOrder = 3
- Value = 1
- end
- object LabelsFullSheet: TRadioButton
- Left = 24
- Top = 64
- Width = 273
- Height = 17
- Caption = 'Full Sheet of Labels per Entry'
- TabOrder = 0
- OnClick = LabelsFullSheetClick
- end
- object LabelsRow: TRadioButton
- Left = 24
- Top = 87
- Width = 273
- Height = 17
- Caption = 'Complete Row of Labels per Entry'
- TabOrder = 1
- OnClick = LabelsFullSheetClick
- end
- object LabelsCopies: TRadioButton
- Left = 24
- Top = 109
- Width = 273
- Height = 17
- Caption = 'Specified Number of Labels per Entry'
- Checked = True
- TabOrder = 2
- TabStop = True
- OnClick = LabelsFullSheetClick
- end
- object EnableSkip: TCheckBox
- Left = 24
- Top = 184
- Width = 291
- Height = 17
- Caption = 'Enable Prompt for Starting Label Number'
- TabOrder = 4
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '6'
- object Label9: TLabel
- Left = 8
- Top = 16
- Width = 305
- Height = 65
- AutoSize = False
- Caption =
- 'The settings input to this Wizard, may be saved as a "Quick Repo' +
- 'rt" . These Reports allow print settings to be stored and quickl' +
- 'y recalled when required.'
- WordWrap = True
- end
- object Bevel6: TBevel
- Left = 8
- Top = 88
- Width = 305
- Height = 7
- Shape = bsTopLine
- end
- object QRSave: TCheckBox
- Left = 16
- Top = 125
- Width = 297
- Height = 17
- Caption = 'Save Settings as a "&Quick Report" ?'
- TabOrder = 0
- OnClick = QRSaveClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '7'
- object QRLabel: TLabel
- Left = 8
- Top = 71
- Width = 105
- Height = 20
- AutoSize = False
- Caption = 'Rep&ort Name:'
- WordWrap = True
- end
- object Bevel10: TBevel
- Left = 8
- Top = 49
- Width = 305
- Height = 7
- Shape = bsTopLine
- end
- object Label22: TLabel
- Left = 8
- Top = 11
- Width = 305
- Height = 34
- AutoSize = False
- Caption =
- 'Please enter the required details to store these settings as a Q' +
- 'uick Report'
- WordWrap = True
- end
- object Link1: TImage
- Left = 11
- Top = 149
- Width = 16
- Height = 16
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- end
- object Image2: TImage
- Left = 11
- Top = 174
- Width = 16
- Height = 16
- AutoSize = True
- Picture.Data = {<image002.bmp>}
- end
- object LinkBox1: TCheckBox
- Left = 33
- Top = 149
- Width = 272
- Height = 17
- Caption = '&Link Report to Toolbar Button'
- TabOrder = 0
- OnClick = LinkBox1Click
- end
- object LinkBox2: TCheckBox
- Left = 33
- Top = 174
- Width = 272
- Height = 17
- Caption = 'Lin&k Report to Second Toolbar Button'
- TabOrder = 1
- OnClick = LinkBox2Click
- end
- object QRName: TComboBox
- Left = 8
- Top = 93
- Width = 305
- Height = 24
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ItemHeight = 16
- ParentFont = False
- TabOrder = 2
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = '8'
- object Bevel11: TBevel
- Left = 8
- Top = 175
- Width = 305
- Height = 9
- Shape = bsTopLine
- end
- object PrtLabel: TLabel
- Left = 8
- Top = 184
- Width = 305
- Height = 20
- AutoSize = False
- Caption = 'To perform this Print, click the Print Button'
- WordWrap = True
- end
- object Label5: TLabel
- Left = 8
- Top = 8
- Width = 305
- Height = 18
- AutoSize = False
- Caption = 'The Print Process is now ready.'
- WordWrap = True
- end
- object Label3: TLabel
- Left = 8
- Top = 40
- Width = 305
- Height = 73
- AutoSize = False
- Caption =
- 'If required the print may be viewed before printing, using the P' +
- 'rint Preview facility. This allows the format and content of th' +
- 'e print to be checked and then printed if required.'
- WordWrap = True
- end
- object Preview: TCheckBox
- Left = 16
- Top = 128
- Width = 273
- Height = 17
- Caption = 'Preview before Printing ?'
- TabOrder = 0
- OnClick = PreviewClick
- end
- end
- end
- object Cal: TEPCalendarPopup
- FirstYear = 1900
- LastYear = 2100
- OnClick = CalClick
- Left = 80
- Top = 264
- end
- object ECal: TEPCalendarPopup
- FirstYear = 1900
- LastYear = 2100
- OnClick = ECalClick
- Left = 112
- Top = 264
- end
- end
-